home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Co-Cz / Confine.cpt / CONSAF.STK / card_5605.txt < prev    next >
Text File  |  1990-02-06  |  6KB  |  268 lines
  1. -- card: 5605 from stack: in.STK
  2. -- bmap block id: 5846
  3. -- flags: 0000
  4. -- background id: 2575
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global sfield
  9.   set scroll  of card field 1 to zero
  10.   put scroll of card field 1 into it
  11.   if sfield is 1 then
  12.     put "Please wait, text will scroll" into message
  13.     show message
  14.     wait 3 seconds
  15.     hide message
  16.     repeat for 180 times
  17.       add 1 to it
  18.       set scroll of card field 1 to it
  19.     end repeat
  20.     put 0 into sfield
  21.     hide message
  22.   else
  23.     set scroll of card field 1 to zero
  24.   end if
  25. end openCard
  26.  
  27.  
  28.  
  29.  
  30.  
  31. -- part 1 (field)
  32. -- low flags: 00
  33. -- high flags: 4007
  34. -- rect: left=34 top=90 right=299 bottom=265
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 0 / 0
  37. -- text alignment: 0
  38. -- font id: 22
  39. -- text size: 10
  40. -- style flags: 0
  41. -- line height: 13
  42. -- part name: 
  43.  
  44.  
  45. -- part 2 (button)
  46. -- low flags: 00
  47. -- high flags: 2000
  48. -- rect: left=343 top=146 right=198 bottom=407
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 1
  52. -- font id: 0
  53. -- text size: 12
  54. -- style flags: 0
  55. -- line height: 16
  56. -- part name: Atmosphere
  57. ----- HyperTalk script -----
  58. on mouseUp
  59.   visual effect dissolve
  60.   go to card id 12734
  61. end mouseUp
  62.  
  63.  
  64.  
  65. -- part 3 (button)
  66. -- low flags: 00
  67. -- high flags: 2000
  68. -- rect: left=411 top=90 right=142 bottom=475
  69. -- title width / last selected line: 0
  70. -- icon id / first selected line: 0 / 0
  71. -- text alignment: 1
  72. -- font id: 0
  73. -- text size: 12
  74. -- style flags: 0
  75. -- line height: 16
  76. -- part name: Permitted Procedures
  77. ----- HyperTalk script -----
  78. on mouseUp
  79.   visual effect dissolve
  80.   go to card id 6452
  81. end mouseUp
  82.  
  83.  
  84.  
  85.  
  86. -- part 4 (button)
  87. -- low flags: 00
  88. -- high flags: A004
  89. -- rect: left=341 top=243 right=300 bottom=405
  90. -- title width / last selected line: 0
  91. -- icon id / first selected line: 14953 / 14953
  92. -- text alignment: 1
  93. -- font id: 0
  94. -- text size: 12
  95. -- style flags: 0
  96. -- line height: 16
  97. -- part name: Return
  98. ----- HyperTalk script -----
  99. on mouseUp
  100.   beep 1
  101.   answer "Click on RETURN ARROW to return to this card!"
  102.  
  103. end mouseUp
  104.  
  105.  
  106.  
  107. -- part 5 (button)
  108. -- low flags: 00
  109. -- high flags: 2000
  110. -- rect: left=272 top=146 right=197 bottom=336
  111. -- title width / last selected line: 0
  112. -- icon id / first selected line: 0 / 0
  113. -- text alignment: 1
  114. -- font id: 0
  115. -- text size: 12
  116. -- style flags: 0
  117. -- line height: 16
  118. -- part name: Respiratory Protection
  119. ----- HyperTalk script -----
  120. on mouseUp
  121.   visual effect dissolve
  122.   go to card id 8140
  123. end mouseUp
  124.  
  125.  
  126.  
  127.  
  128. -- part 6 (button)
  129. -- low flags: 00
  130. -- high flags: 2000
  131. -- rect: left=342 top=90 right=142 bottom=406
  132. -- title width / last selected line: 0
  133. -- icon id / first selected line: 0 / 0
  134. -- text alignment: 1
  135. -- font id: 0
  136. -- text size: 12
  137. -- style flags: 0
  138. -- line height: 16
  139. -- part name: Toxicology
  140. ----- HyperTalk script -----
  141. on mouseUp
  142.   visual effect dissolve
  143.   go to card id 2193
  144. end mouseUp
  145.  
  146.  
  147.  
  148.  
  149. -- part 7 (button)
  150. -- low flags: 00
  151. -- high flags: 2000
  152. -- rect: left=272 top=90 right=142 bottom=336
  153. -- title width / last selected line: 0
  154. -- icon id / first selected line: 0 / 0
  155. -- text alignment: 1
  156. -- font id: 0
  157. -- text size: 12
  158. -- style flags: 0
  159. -- line height: 16
  160. -- part name: Confined Spaces
  161. ----- HyperTalk script -----
  162. on mouseUp
  163.  
  164.   visual effect dissolve
  165.   go to card id 4908
  166. end mouseUp
  167.  
  168.  
  169.  
  170.  
  171. -- part 8 (button)
  172. -- low flags: 00
  173. -- high flags: 2000
  174. -- rect: left=412 top=146 right=199 bottom=475
  175. -- title width / last selected line: 0
  176. -- icon id / first selected line: 0 / 0
  177. -- text alignment: 1
  178. -- font id: 0
  179. -- text size: 12
  180. -- style flags: 0
  181. -- line height: 16
  182. -- part name: Hazards
  183. ----- HyperTalk script -----
  184. on mouseUp
  185.   visual effect dissolve
  186.   go to card id 9183
  187. end mouseUp
  188.  
  189.  
  190.  
  191.  
  192. -- part 14 (button)
  193. -- low flags: 00
  194. -- high flags: A004
  195. -- rect: left=273 top=243 right=300 bottom=338
  196. -- title width / last selected line: 65535
  197. -- icon id / first selected line: -15744 / 49792
  198. -- text alignment: 1
  199. -- font id: 0
  200. -- text size: 12
  201. -- style flags: 0
  202. -- line height: 16
  203. -- part name: Quit Tutorial
  204. ----- HyperTalk script -----
  205. on mouseUp
  206.   doMenu "Quit Hypercard"
  207. end mouseUp
  208.  
  209.  
  210.  
  211. -- part 16 (button)
  212. -- low flags: 00
  213. -- high flags: 0000
  214. -- rect: left=272 top=203 right=240 bottom=476
  215. -- title width / last selected line: 0
  216. -- icon id / first selected line: 0 / 0
  217. -- text alignment: 1
  218. -- font id: 0
  219. -- text size: 12
  220. -- style flags: 0
  221. -- line height: 16
  222. -- part name: Quiz
  223. ----- HyperTalk script -----
  224. on mouseUp
  225.   visual effect dissolve
  226.   go to card id 7179
  227. end mouseUp
  228.  
  229.  
  230.  
  231. -- part 17 (button)
  232. -- low flags: 00
  233. -- high flags: A004
  234. -- rect: left=408 top=244 right=301 bottom=473
  235. -- title width / last selected line: 0
  236. -- icon id / first selected line: 23078 / 23078
  237. -- text alignment: 1
  238. -- font id: 0
  239. -- text size: 12
  240. -- style flags: 0
  241. -- line height: 16
  242. -- part name: INFO
  243. ----- HyperTalk script -----
  244. on mouseUp
  245.   visual effect dissolve
  246.   go to card id 3691
  247. end mouseUp
  248.  
  249.  
  250.  
  251. -- part contents for background part 6
  252. ----- text -----
  253.      Confined Space Safety 
  254.  
  255. -- part contents for card part 1
  256. ----- text -----
  257. Topics in the Confined Space Safety Hypercard tutorial are selectable by clicking on the buttons to the right of this scrolling text field.  You will find that many of the text fields presented here are scrolling fields and can be operated by clicking the mouse on the arrow buttons of the field.
  258.  
  259. To return to this card for selection of a new topic click on the RETURN button at any time during the session.
  260.  
  261. There are six topics listed covering confined spaces, toxicology, respiratory equipment,
  262. safe entry procedures, measuring
  263. a safe atmosphere, and hazards associated with confined spaces.
  264. Simply click on the topic of your
  265. choice.
  266.  
  267. When you have completed your tour
  268. of the listed topics you may try your hand at a small quiz to test your knowledge of confined spaces.